MV - CPCEMU Disk-File Disk-Info (LIBDSK)(Track-Info  R Track-Info  R HARRYMAGZ80 HARRYMAGZ80 !HARRYMAGZ80F"#$%&'()*HARRYMAGLDR),-./01HARRYMAG 2DISK +HARRYMAGCODC0 DHARRYMAG EDb?j!6Y:\81V#o(@#~ ր o >$ӟ   #Ùϟ ǛÙÙɜϟρǛ 9À>g 6v痟vogo>y>zE%: ţ:2Σ.2.e 9僀>g 6v珟nogo>x>x6v6ƅbJjf6f68|9ޞ<}2<>3:>V:֧>:2>3>~Þ|2>3><<*9T*T*UT *~T$4zxRʿ}ʿ}ʿ}ʿ}ʿ~__ீ^(fr)gTzPzĦdqphmL Zذrgzԧx $***i*I"LJ0"v)Tb"L*Q*0_?ҼؒHFRP&dK"!"! "* >ngi18fDd"LQ Q Cx06 X9g9XЎ?m={:&g[g[9s9 +q+ً+ً3>ϛll6 X9g8Xӯ"IkH%k6fg[g[9s9 +q+ً+ً3>ϛll6 X9gX6wgG@sfޙg[g[9s9 +q+ً+ً3>ϛll6 X9gXnѶ'V[VKVSV[V[V[V[VkVsV[VKRSF[ZZZZ6;VVVsVVVVVVVTQFll 9Y9g0A'Iq PM+ty_^uMd-[M@yپ=}ччٓ@477353<dzTLJ=NM2L3ói > =0\7+iiXڜԮħ#|_GC@@vG_|rPAAGG__~|رڳғүȪ@UՀx88<\~8=f'Y9x>w<`;83/~g7{/mmnxwg_F_V|fvfV46>F^>|6Vfv4fVF^^|fvv6p?30?03>}6}? p???_>O3Mφr>|]FvF=p  <8 .G3L 0<? @>@0 >Fs<@ 3?<p_oWiV8fYÞ^<~[X.)0??'tG3 0<@`PhF`AÀ@<@@@ 3?<|c}15nbP]=;+=^?@p_v6 n|l`PY?Op_v뿟n> v7F 7z htn`;` >?6 =Ϙx=ku ng﹟;o̟>vgF /z hp?np0`>?6g =טx=kqns7d48?.?`/w`?O 9p{p8?;  wO/w{w;48?.6?p/o?_/ Wy>{pp03; 6 o_߯/Wy{ww748?.}?.]?`} =/;|߼\7oָ}?=>"AA@A ~ n8t?m0 >~nqa>?o  ?t07t|{x1{h>?o?q7q yxcC_>=E@@1=g`>4>ſ=g|/0/~| |?`| |xd(ۀxXx0 |g'/ß{ |op/`/pop/t~@| |owsqp0| }{?>9=;`%߼v9wp/{z lpG:}{)gʁU+ߓ߫߃߅  ? pxw^>v<<?{<?> >v< `0/0݀:x1.0Yzrݦ8ٜNrs8<À~ /݇{0/x<8?x8=!|(v1[߾k0qw~8=;?x;=}v[߾kqϏw~< hÌ0>;)10 d!gg`Ǔat [e.6/>>)1egG8hݜ1m-X4;d7./.66/6>>;)!0dgǗc[ۃe.6 vvvv}}}M}]PPPP zz```` $OO,B.F0~ hhhh p @;`:"@ (hwx_os|>??a7/(Q78qo``i`i0}XXXX3ƞ9PPPPťŵյ١ɑ55PPPPm%%%xxxxEEEUUժUUxxxx@@@@@@@((((pppp*((ppppxxxxxxxxpppp @HA@Track-Info  R  d```` J &0)ȉF0 9G$Hl?y$6````0ph` PP|#0 8DDDDD8 $ $PPPP*[x[x@xo@x[x[x@xPPPP??--?--??pppp?`^{}uuu)uuE}xxxxwttwtpxxxx [[[[ c|#s97??hhhhxxxx4444467544/P%'/E/'`5eG5Oɀ @A8BrdͫO$fDsX|B#~Br̳ݘ`YLBE~# xxxx?`@ x#* *xxxxkm-ikklnml nml l ll>xxxxހ@~DVD4ܯ޾րxxxx00xxxxOO?ÃOO?xxxx_Pr{@ PPPPU,ݰ~p+}N````qwuuw=]1uUwppppO_=#ݻ7'1hhhh      ~xx@x              _TX xxx@,FTTT xx *I4}xxxx <l< <xx      2:V:Zz^>'Si`TWde'HM\xxxx Xh7/;r;r;r xxxx80 ,(2*))xxxx?LH((8{()( `xxxx   ,]xxl<x       xx9z1@xx02?<xx&b"|xx ;xx        x 8`oD0l &2Z[6oXPxxxx               xx `PP ? xxxx   oyz{>t Xxxxx =s,~((~|? <@@xxxxc Pxi()^).|0;?xxxx1({X{4~ ~><`xxxx/0:????O  @xxxx/0:ɿ_ xxxx?poX[Xhx߽yXb?xxxx8l7-tt|L׸z0@xxxx       @ xxxx                xxpߠ`xLd䴶lߨ( @>'xxxx  x            xx!$$$@/3;``)p7xxxx d`dPPPP@@ @@PPPP@@ @@PPPPpLC@@0@ @0@CLpPPPP0 @@@@ 0````0 @@@@ 0xxxx        ''>';xx %? 03? 03O3l6+?KORr-8g-t1SjrVM9Z[G3hjpݳ@՛9 p@?@ ?TUUA UUAT@ p@9p8??0- @# # @00- @# x x00xx x x0???xxxpxx88xxppxx8A BH !<8 #<p0<8 8wẅwẅNgsNgsr΀r΀p<<;f=B<ll8>>~~|||||||>> |||||||||<Ϝ>xygx<'88_Lds#<,1ҺD,1666dddd +qrt'G8d8mff=8p  008~~8p888 0`<88888888888p 0 `0 0`x888f>00<66<202 >BB<DHpHDB@~BfZBBBBbRJFB"LOW PAIR":5600 "s$""t$="HIGH PAIR":5600 i=19 :c$(1)=r$(i)c$(2)=r$(i+1)c$(3)=r$(i+2)c$(4)=r$(i+3)c$(5)=r$(i+4)t$="STRAIGHT"  hi:c$(1)="A"c$(2)="0"c$(3)="J"c$(4)="Q"c$(5)="K"t$="HIGH STRAIGHT" !{s$="NOTHING":f$(1)=f$(2)f$(2)=f$(3)f$(3)=f$(4)f$(4)=f$(5)s$="FLUSH" "<s$="FLUSH"t$="HIGH STRAIGHT"t$="ROYAL FLUSH":5600 #:s$="FLUSH"t$="STRAIGHT"t$="STRAIGHT FLUSH":5600 $t$=""t$=s$ % 5600 &dtmpc=0:tmpc=c+3:c=(tmpc/4):col=(tmpc-c*4)+1:*** ConvertCard *** (s$=r$(c):s$="0"s$="10" ) *fz=15:c=(c$(z))-64@:550&:s$="10"s$="0":** Convet c$ to real Cardnmes ** +&c$(z)=s$:f$(z)=(col+64@):z: 010 ,7;1;t$:498:i=112 :s$:c:t$=s$11 ,7;1;"YOU WIN: ";c:gold=gold+c 4 i:s$="2" 6c14,7;"N=New Game":15,7;"E=End Game":22:a$="E"a$="e"20 8!a$="N"a$="n"a$=s$:408 : 5666 X660:*Karo* Zbi+15,j+2:8,16:-8,16:-8,-16:8,-16 \ b660:*Herz* d-i+16,j+7:n=1:m=-1 f10 ,n*10 :0,n*10 :-4,n*4:-5,0:-2,m*2:-2,n*2:-5,0:-4,m*4:0,m*10 :10 ,m*10 : l660:*pick* n9i+16,j+32 :n=-1:m=1:614f pPi+11 ,j+4:8,0:i+15,j+4:0,6: v660:*kreuz* xei+10 ,j+30:638~:i+6,j+20:638~:i+16,j+20:638~ z 624p ~H8,0:0,-8:-8,0:0,8: gi+2,j+2:26,0:0,36$:-26,0:0,-36$:*back* Qi,j:30,0:0,40(:-30,0:0,-40(: Gi=mx:i=ii+89Y:i,0:i:45056::** ClearScreen ** '1,1;1;"Wait...": i=22528X22800Y i,0:i %"Startadress?":a:***HexMonitor*** nb=a:i=41-1:n=(b/(16^(i-1))):b=b-(n*(16^(i-1))):692:i b":";:a=aa+8:b=(a):n=(b/16):b=b-n*16:692:n=b:692:" ";:a  684 'n=n+480:n58:n=n+7 n$=(n):n$;: +i=49100̿492000:c:i,c:i,c:i >i=032 :c=(46973}+i):47909%+i,c:i: _810*:i=49200049299:c:i,c:i::*49100-BFCC:listvars;49200-C030:itemtable* 8item=(itable+rn):item=090Z:***Items*** &item<9 750+item:b$:i$ :mx+b$(2)-480,b$(3)-480:90Z 8item<9 750+item:b$:s$:***ActionItem*** mc=68D746 $4,2;"You found a ";s$ 6i=b$(1)-480:v(i)=v(i)+1:v$(i)=s$ 0mx+b$(2)-480,b$(4)-480 'itable+rn,0:66B:24 7*ITEM-DATEN: inr,iposition,iblocknew,iblockold,string "1OCJ","Key" "1OC[","Key" "2OC[","Herb" "3OC[","Shild" "5`U[","Enemy" "6atJ","locked door!" "7gUJ","Enemy2" "8WTJ","Guard"  *ROOM TABLE* !y1,2,4,6,7,8,9 ,10 ,11 ,12 ,3,5,1,79O,80P,81Q,77M,76L,78N,524,14,13Track-Info  R  ,19,20,20,21,41),42*,47/,46.,15,22,24,38&,39',40(,524,43+,44,,45-,16,23,25,37%,513,13,524,502,491,480,17,27,26,59;,568,568,67C,557,546,535,18,28,36$,60<,568,568,68D,69E,70F,71G,35#,29,36$,58:,579,568,75K,74J,73I,72H,34",30,36$,1,1,61=,62>,62>,62>,63?,32 ,31,33!,66B,65A,65A,65A,65A,65A,64@ %*INROOM-TABLE* &!1,2,2,2,2,2,1,3,3,4,1,2,1,1,1,1,1,1,1,5,5,6,5,5,5,5,5,5,4,6,5,5,5,5,5,5,5,2,1,5,5,5,5,5,5,5,1,1,1,1,5,5,5,5,5,5,1,5,5,5,5,5,5,7,5,1,1,1,1,5,1,5,5,5,5,1,1,1,1,1,5,5,5,5,5,5,1,1,1,1,1,1,1,1,1,1,1,1,1,1 )*ITEM-ENEMY TABLE* *Q0,0,0,0,0,0,7,0,8,0 +Q0,0,0,0,0,0,0,0,0,0 ,Q0,0,2,0,0,0,0,0,0,0 -Q0,0,2,0,2,5,6,0,0,0 .Q0,0,0,2,3,2,0,0,0,0 /Q0,0,0,0,4,0,0,0,0,0 0Q0,0,0,0,1,0,0,0,0,0 1Q0,0,0,0,0,0,0,0,0,0 2Q0,0,0,0,0,0,0,0,0,0 3Q0,0,0,0,0,0,0,0,0,0 R *INROOMS* S="o;g<;B=B=;;g=;CFCF;;>F>;hF;;?F?=hF;;hFDEFF;;lF;;lFj;7;;;;" TJ"o;<<;=Bg=;;==;FCFD ;;>F;gFDF;;?F=gFDO;;FEFFEFDF;;FFEFFEFF;; jF j;7;;;;" U%"m9l^99l]99m\99\m9l\m9\99l\j979999" VC"o;<<;=Bg=;;==;FCFF ;;>F;FFPFF;;?F=FFDFF;;hFEgF;;lF;; jF j;7;;;;" W'"o9l^99l]99l\i9\\i9l\h9h\h9l\j979999" X2"o9lN99l=99lJ99JIJJIJIJ99lJ99JJIgJIJ99lJj979999" Y@"o9lN99lM99>J>J>JJA99?J?J?gJ99gJKLJIJ99JIJKLgJ99gJKLgJj979999"  *ROOMS* 2"p2k132l132k1332k1882j13882i13g82h133g82h133833" ""n2g3h8i3k833883y83o83i83p8" ;"2g13388332h138g32h13g532i167632k1332j1g32i1h323g1i32l33" ,"n2g1k3h1g5388h1676383l183k1g3j1h3g1p3h33" G"3l833g838g5383h86763383i83883g83388338838388g38338838833h838k388g33" -"n9nNJJlM9mJ9nJ9iJIUJ99J9J9JJ9J99JJ9hJk9J9" *"n9nNnMnJlJ9JJ99JJ99J99JJ9J9J9gJj9JJn99" ,"n9nNnMnJnJi9Jh9J9JJKLJ9J99JJ9KLJJj9KLg99" ""n9nNnMxJ99kJ99J9jJ99JJ9iJi9iJ9" ""n9nNnMt[9[l9g[99Y99i[99k[i9i[9" !"p2l122v13m13388h18h3i8k388p33" 5"n2l122j1g52j16762j12:223388122122g3i832i388332m32" /"h9[[i9ZN9[[gN99HM9[[gM99l[9x[9l[99l[i9[[g99" 2"y9Y[9[[gN99[V9[[gM99[9k[9[9k[9[[9i[99l[i9[[g99" K"h9[[i9Z99[[i9H99[[9NN99H9g[99M99H9[9g[9[9[9[[9[9[[99[9[[9[g9h[9g[i9[h99" 3"h9[j9[[9i[99g[h9[99[9j[99[[m9k[99[j9[99l[i9[h99" 3"h9[j9gN[hN99gM[hM99l[99l[99n[9l[99g[KLg[i9KLg99" <"h9KLi9gNKL99N99MGMKL9WM99g[KL9[[99g[KL9[[99h[9g[g9j[w999" -"o9lN99lM99l[9[9j[9g[9h[9[[9[[h9[[g9j[n999" 1"p9<9<9<9<99l=99l[9JIJIJIJIpJ9IJIJIJI[g9j[n999" A"h9KLi9gNKLgN99gMKLgM99gJKLgJ9hJKLlJKLhJ9gJKLgJg9JJKLJJj9KLg99" /"h9[[l9[[gNg9M9[[gM99l[99m[9m[9l[g9j[j9[[g99" D"h9[[m9h[g9[9[9g[99i[99[99[99g[9[99[9[9[[9[99[[9[9g[g9[[9[l9[[g99" &"o9lN99lM99k[99m[9m[99l[g9j[j9[[g99" *"h9[[j9j[h9k[99l[99m[9m[99k[g9j[j9[[g99" ;"h9[[j9i[i9i[h9i[9[[9g[9[99[[9h[9[[9[g9g[99[[g9j[j9[[g99" /"p9j"2m32h38g3823g5i32867688g323h83833288383g832k8332h8i3288j33" 4"h9JJiJgNJJNNg9gMJJMMg9kJg9lJ99lJ99kJi9hJk9JJ9999" 4"h9[[i9<<9[[9<<99==9[[9==99l[9x[99k[999j[j9[[9999" ("o9l<99l=99l[99m[9m[99k[999j[j9[[9999" ""o9l<99l=99j[9Y9x[99k[999j[n999" A"h9KLi9g@Pײ@@U*"2 !  ~͆*##"#*, "x HS>2  PS>2  ***Set Block***!($ = "*[w#w# * w#w# *:      w#w w#w=    '  #D   34567 =$:a$="E"a$="e"20 =c+10 :d=c:j=1t(i):d,s:d=d-1:j:s=s+1:i:45056::**ig1copy** listvars;49200-C030:itemtable* ;"2.k-joystick":7 FillMatrix *** MMMMMMWXWMMjdM323Vb3-0b}x(>@Pײ@@U*"2 !  ~͆*##"#*, "x HS>2  PS>2  ***Set Block***!($ = "*[w#w# * w#w# *:      w#w w#w=    '  #D   34567 =$=$A"A@ ! @xxx0|#s97??hhh0 q]s?-]7w~M~?o}```0c߶UUHHH0UU_UUHHH0???0000?`_}~zzzzzB~PPP0 @HAA d```0WۓOOHHH0xxx0}}}M}]xxx0Կ_|{|ƿXXX00000?+*xxx0o?Track-Info  R  xxx0w__`"@xxx0 0(870t0404> ~xxx0m%%%xxx0EUEUժUUxxx0@@@((xxx0 (xxx0xxx0م9)5[mGPPP0UUUUPPP0:zxxx0~>~66~>~xxx0xxx0{{xxx0;yy9=;9y XXX0 y;9)IXXX0}}l xxxxxx}/I5r"\T(\W}lػw//xxx0H2"X5,ZںU?]YovQxxx0k{ыm[ٛl"5s~?xxx0ʽ|z^^>~޸xxx0ڵ,z^^>Y~x~qxxx0j4Y_ԯĪfKN~;^zxxx0FV.n+YO{xxx0?ZZU]ovQxxx0U@Ww_wwwxxx0qwuuw=]1uUwxxx0jmUU?????xxx0xxx0*U{mmnn*XXX0$UφګmڪoЮ:XXX04444467544xxx0/P%'.E/'`5eG5Oɀxxx0?j@!Vz* *xxx0 xxx0?@@@@aAFXFA@a@@@@?hhh0  @@hhh0@@  hhh0pLC@@1@ @1@CLphhh07]ʉΉʉI?hhh0\`]UUIU]I`\hhh0ܕUUIhhh0\`PUQ]U\`\hhh0wݸ;@@;hhh0T(P8xxxx0???\>P ?=@9?8?/xxx0oU(9p=xxx0nU( ppxxx0?=X X5<;?>;8 > ߿πə*K\> > ~(>w(o( ր`>$>(>)#^#2ϼ/|?Cq5WWWWWWWW 񓓙ۓ W{ۓ Wۓ66ۓAWu߶6ۓo{ 홙ߟO O?ٺO~~OP߿~O ͘͟ A۔|ەY{ۓەۓۿ%߭߭߭߭߭߭ ܏)МПO Ƀ܃ϻ绔OO>>Ot30矇>O|N 33真9玞 ɟϓ瓔Ư癙ϓO{痟痟矗ōu 'Ïg ~~{v^uρϟǛ~ Mc xTrack-Info  R q^Uッ2w/66l"66W 癁ɟ6ۓ W ۓ66666666ۓ WWWWW ۓۓ66666ۓۓۓ ~uO~~5~~1Aݻ线 ϙ~O ~~~ O~~~~~~~~O ~~~~~ OO~~~~~OOO uosە˓ ۿ  σ>wn_ >>::>::>u᫛σɃ݃ ۙ::>O ɻ绛݃>>> O>>>>>>>>O ߭߾>>>>>߭߭ OO>>>>>OOO ϟuU ϟɟٟ 灙瑑 瓛ٟ ~?{~~zz~~zz~w קßzz~ÿ~~~~~~~~~~~~~~~~~~~~~ 6?  66666666  ?7F@1ʉV@WWWWWWW ۓۓۓۓۓۓۓ @WWWWW A @IۓۓۓۓۓL@ OOOOOOO @p @a COOOOOL@  @@L @@LL@߭߭߭߭߭߭ OOOOOOO @a@C߭߭߭߭ @@pOOOOOL@ A @] @L@  F @1ʉ@V@ X@ Ή??W@HxxxxH 8HxHH 8HxHH 8H`XHH 8H`HH 8HH0xxxx0000xxHH 8H`HH 8H`xxHH 8x x 8x 8x`HH 8x `xHH 8H `xHH 8HHxHH 8HHHH xH 8HHHH xH 8H 8H 8 h H 8 h HL8@o # @6\\\\b*[b'\%/TDWX![! HP!!x0 K SR P45056:710 <236066\,0:236077\,187:font bc00-beff 0:7:1,1;"HARRY THE MAGICAL":2,1;"-":4:3,1;"The Hero Hallows":4,1;"(c) cmg 1986-2010":10 ,1;"cmg";(64@);"breathenet.de":11 ,1;"01746973355";(64@):12 ,1;"vodafone.de":6,1;"1.keys: 1,2,3,4,5":7,1;"2.kemp-Joystick" z7:8,1;1;"Press 1 or 2":22:a$="1"20,1;"1 2 3 4 5":e=26:12 <a$="2"20,1;"KEMPSTON":e=32 :12 7 <b=45056:mx=45313:B000,B101 *** Variables *** 5itable=492000:v(5):v$(5,5) sn=60<:snlr=0:sx=5:xs=0:xt=0:sy=4:ys=0:yt=0:rn=36$:mc=0:pos=0:oldb=0:**Sprite/RoomValues** ja$="":s$="":i=0:j=0:k=0:l=0:c=0:p=0:z=0:** Globals ** Ahp=10 :mp=10 :ex=0:lv=1:gold=10 Qleft=100d:down=120x:up=140:right=160:action=180 item=0:rf=0:vf=0:t(6):c$(5):r$="A234567890JQK":d$(524):f$(5):** flags,ingames **  80P:e a$=:a$=""22   90Z:e  *KEYBOARD* 3k=63486:k=191k=25526 k<200k=k+64@ Kl=254:d=253:u=251:r=247:a=239:40(  *KEMPSTON* "k=31:k=032 "8l=2:d=4:u=8:r=1:a=16 (xs=sx:ys=sy ) k=ddown * k=uup + k=rright , k=aaction - k=lleft .e 2Amxb=mx:1,1;1;"Wait...":*** ShowMatrix *** 4i=0̱a$-1 5c=a$(i+1)-480:c557d=a$(i+2)-480:k=0c-535:mxb,d:mxb=mxb+1:k:i=i+2:535 6mxb,c:mxb=mxb+1Track-Info  R         :i B0:7:0,24;"STATUS":1,24;"=":4,20;" ":4,20;"HP:";hp:5,20;"MP:";mp:6,20;"Ex:";ex:7,20;"Lv:";lv:8,20;" ":8,20;"Gd:";gold Hg10 ,20;"Inventory:":i=15:v(i)010 +i,20;v(i);" ";v$(i) Li: Pt801!+5*rf:i=1rn:mn:i:mn+(900-502*rf):a$:502:720:*** FillMatrix *** ZLpos=mx+sx+sy*10 :oldb=(pos):pos,sn:y=b:pos,oldb::***Sprite*** c 90Z:e drsn=62>+snlr:snlr=snlr+1:snlr=snlr*(snlr2):sx=sx-1:sx-1112p:** Left ** lsx=9 :rn=rn-1 n 80P p$200:z=0sx=xs:sy=ys t 90Z:e xMsnlr=0:sy=sy+1:sn=64@:sy9 112p:** Down ** ~'sy=0:rn=rn+10 :110n Lsnlr=0:sy=sy-1:sn=66B:sy-1112p:** Up ** 'sy=8:rn=rn-10 :110n ssn=60<+snlr:snlr=snlr+1:snlr=snlr*(snlr2):sx=sx+1:sx10 112p:** Right ** &sx=0:rn=rn+1:110n Ymc=68Dv(1)=0s$="You need a key to open!!!":188:***Action*** kmc=68Dv(1)>04,1;"Door open!!!":v(1)=v(1)-1:740 %mc=19item0740 Amc<35#mc>42*4,2;"Nothing happens ":e Gmc=37%mc=39'hp>2rn4gold>2300, +192:i=1(mc-34"):s$:i bl=4:c=1:i=1̱s$:l,c;s$(i):c=c+1:c=18c=1:l=l+1 i:e Q"Master Dumb: Harry, you must found your frinds Herm and Rom, be a Hero!!!":35 '"You need a Permission to leave!":36 ."To found secret places you must effort":37 9"Herm:Harry, im so lucky to see you, youre a Hero!":38 ȍ21,1;" ":z=0:mc=(mx+sx+sy*10 ):48896,mc:z=48897:z=1:*** CheckBlock *** <mc=37%21,1;"take duell!!!":10 : Kmc>34"mc<43+21,1;"Talk to person....":10 Iitem0mc=(b$(3)-480)21,1;i$:10 20,20;mc ;mc=7mc=41)mc=42*mc=23250  Kz=1:rf=0270:rf=1:80P::***EnterRoom*** /rf=1280:rf=0:80P: 5xt=sx:yt=sy:sx=5:sy=7::**PosSave** ,sx=xt:sy=yt:sy=sy+1::**posLoad** sx=xt:sy=yt ,%mc=39'400:***Duell*** 8et()=((65536*23674z\+256*23673y\+23672x\)/60<):sekunden seit start :31,1;"*GET READY FOR DUELL*":0 ;(3,2;"*REPEAT THE SPELL!*" <t1=t():c=0 =65,2;" ":5,5;" "; >*x$=(480+9 *):a$=x$:1 @x$; B$t2=t():t2-t110 330J D"x$="":10 :a$320@ Fc=c+1:318> J7,5;"Points: ";c L0:t=(t2-t1) NIc<38,5;" FAILED!!! ":hp=hp-1:748 P750+item:b$ R(9 ,2;"YOU WON!!!":0 T 746 1,1;"PLAY with me!":2,1;"Mahjong ?(1)":3,1;"Video-":4,1;"Poker ?(2)":*** MAHJONG *** #22:a$"1"a$"2"24 (gold=gold-1:66B:666 a$="2"500 Ii=16:t(i)=1:i:480:c=mx+19:t=1 'c,513:45056:e+425 @k=dt6c,0:c=c+10 :t=t+1:420 @k=ut1c,0:c=c-10 :t=t-1:420 k=a434  420 l=199c:k=13:r=(6*)+1:mx+2+k,r+32 :t(r)=t(r)+1:480:t(r)=9 k=3:l=99c Pk:mx+3,0:mx+4,0:mx+5,0:45056:l t=rgold=gold+6 s$="1":5666 4k=63486:k=191k=255451 k<200k=k+64@ )d=253:u=251:a=239: #k=31:k=0460 $d=4:u=8:a=16: c=mx-2+10 :s=33!:i=16:c=c+10 :d=c:j=1t(i):d,s:d=d-1:j:s=s+1:i:45056::**ig1copy*Track-Info  R         * "NOTHING",0,"LOW PAIR",0,"HIGH PAIR",1,"TWO PAIR",2,"THREE",3,"HIGH STRAIGHT",4,"STRAIGHT",4,"FLUSH",6,"FULL HOUSE",9 ,"QUADS",25,"STRAIGHT FLUSH",502,"ROYAL FLUSH",250 5,0,0,98b,5,4,32 ,98b,5,8,64@,98b,5,12 ,96`,98b,5,16,128,98b c668:t$="12345":z=1524:d$(z)=((524*)+65A):z:** ShuffleCards ** Fp=1:z=15:c$(z)=d$(p):p=p+1:z:520 12 ,1;"** Choose Cards **":13 ,2;"1-5=Hold Card":14,2;"N=New Choice":15,2;"Enter=Draw" T526:22:k=(a$):k>480k<546t$(k-480)="H":512 &a$="n"a$="N"t$="12345":512 "k=13 668:530  512 666:0,1;"** VIDEO POKER **":7:0:499:z=15:c=(c$(z))-64@:550&:i,j:i,j;s$:i,j:660:590N+10 *col:z::*** DisplayPokerCards *** Uz=04:10 ,2+z*4;t$(z+1):z::*** TextMask *** 8z=15:t$(z)"H"c$(z)=d$(p):p=p+1 Wz:i=15:j=15:c$(i)2\2H\!@@u!9{@!CCM6!ZZ6?!z!:x!X!P"Vv>v:z2C͆q!xC:C( !mqq!9{@q*q" q!~q@qK q*qB"'q4F |H0 G } >ZrB!4F14D͂C>2\[y"q"q~ݾ ###|( "q*q>ZrBSNAP128KSNAP48KEND!!?v,r!iz:y[2iz!v,r!8!v,r!nf|(>_rJ~"2C!8s8!>s8!Hs(!Qs (>_r!er!s:s #er:C:z>_r! v!HH6!IrerO!v +3DOS ERROR: !r!8s͔r>~ >8!s˿͔rlr#اG>PROGRAMA MUY GRANDE - NO ENTRA EN EL PRIMER TERCIO ERROR NO PUEDO ENCONTRAR RUTINASDE CARGA LIBRE: 48K128K/+2+3/+2APENTAGONDESCONOCIDOInserte el disco pTrack-Info  R         ara B: y luegopresione una tecla. TIPO DE Z80 DESCONOCIDOMF3 detectado, usando su RAM SNAP Cargando: >2s!6>2hz:y[2_z!_z!v,rk >>v61! x8~(A~####> N#F#yc0 > 0> !v>K> :hz<2hz> 2u61:hz¥t"2gz͙u6~Χ( ( (" (. t:gz(=:hz2gz͔uw:hzO:gz(<uw!:gz(G*z ! :gz(G! !kz (w#!bz:z(4:u_*z:gz(Gs:uG s~ #y(A6 #!kzs~.(#>7>͟u:gz2uo&)))))X ~O~8O~@w#2s!\>y>_r v>ׯׯ@> >2\[y!\x x(.v+--6v>2fv>h2v!ox!:x!@w͡v$ͯv|Xg6h͡v |[8&X}(,}o}(} o}o|((&@&H&P"v!:\:\[˧2\[y:\[2\[y>A_w#^#V#z G{(C 0?8~: ~2y[##{ 0Gxz~a8#>2sxz)u*K\Gy( x( ͸!>_w~~~ G2x~~!x^ V s#r# ~ w# .vd!w6v.vd!.v!5.v!!.v!C:H\ T ] Hz~ 'ݾ F~w#####6#~w#w#??@ ? ?? 8?0?0??8v6?>>sc8?0y08103`0pss0?>0?v0B:*.Z80A:12345678.123         y!!>O:C!CG^#V#z(~#!͠BҰB!"@|B|eo"@|B" @|B"@|B"@|B"C͋B2PA͋Bg͋BoG(˼|===2@}2TA|B"@|B";A|B"8A|B"5A|B|eo"GA|B"DA|B"@A͋B>(>2@͋B͋B( (>^>V>F2NA*@||B|B"@!#͠BҰB͋B2C|B͋B21A!C͋Bw#:C!V͠BҰB͋B2C!!!!>G>|B͋B2C!͠BҰB͋B͋Bgo ͠BҰBhA2AGXAͩB 0͢BҰBXA®B"COSCҰByKC! +SC!4E!"Cy>QB#QB#*C~~#"C*C+"C*C|(w#"C| !|ʮBw͋B͋Bgo!B0>63>>y͜>y> !dC!VC#Co& :Co& C5v!( x z<W x  CM R8 >0~#|GG^SNAP128K4@>͆A>ͮA>y:C(?! ۿ>y2!>y!>2\[2(B2F>2A>2FhAXAO®BͮA< XA®B>ͮA>y!H!4D!\$>yXA®BͮAXA®B"C>2(B2\[y>2A!0(!0!0  !H͜!!!H *C"C!"CA!Cy~y#< :1Ay!4D[:Cy:Cy@2A:C()?!"@!ۿ" !@ ! @{C@{C@ENDSNAP48K4@hAXA((( îB>ͮA ͮA>ͮA>y![%y@>y!@2A:NA^ :PA@0>;G{C>y!@>@END(L) 1999 DJr - V1.11AAAAAAAAGGGGAAAAAAAAGGGGGGGGGGGGAAAAAAAAGGGGAAAAAAAAGGGGGGGGGGGGAACCCCCCGGGGCCCCXCAAGGGGGGGGGGGGAACCCCCCGGGGCCCCCCAAGGGGGGGGGGGGAAppppppGGGGppppxGAAGGGGGGGGGGGGAAFFFFFFGGGGFFFFGGAAGGGGGGGxGGGGAAGGxxxxGGGGxxxxGGAAGGGGGGGxxGGGAAGGGGGGGGGGGGGGGGAAGGGGGGGxGGGGGGGGxxxxGGGGxxxxGGGGGGGGGGGGGGGGGGGGGGGGGGGxGGGGGGGGGGGGGGGGGGGGGGGGxxxxGGGGxxxxGGAAGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGAAGGGGGGGGGGGGTrack-Info  R         AAGGGGGGGGGGGGGGGGAAGGGGGGGGGGGGAAGGGGGGGGGGGGGGGGAAGGGGGGGGGGGGAAAAGGGGGGGGGGAAAAAAGGGGGGGGGGGGAAAAGGGGGGGGGGAAAAAAGGGGGGGGGGGGAAAAAAAAAAAAAAGGGGGGGGGGGGGGGGGGAAAAAAAAAAAAAAGGGGGGGGGGGGGGGGGGhhhhhhhhhhAAAAAAAAAAGGGGGGGGGGGGhhhhhhhhEhAAAAAAAAAAGGGGGGGGGGGGEGGGGGGGEGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGPLUS3DOSaa !0:0::28671o &A$="HARRYMAG":A$+".LDR"28672p 28672p lH#H*UPFL8lT$l[n[n[nII[n[ndHL8l*UP`l8!k``kk``@E@E@E@E@!E@E@$````!````E@   !    `!`!̀2@!!̀2! ̀!̀>!@@*B"u:@2x:[(>2y*F"{:]^0V(F@!r !@NF^V^VNF~ ~ G~ G~ ^W^V^V ^V ^ VO o g>@PLUS3DOS@@*]\"_\C*]\~}t[3*a\Þ*x\#"x\| 4@Ϳnu{=\*\| E*]\#"]\~! ?#8#7"]\ɿRNINKEYPFPOINSCREENATTATAVALCODVALESICOTAASACATLEXINSQSGABPEEIUSSTRCHRNOBIOAN<>/`:Ψҩ./x/(g}<0S_ -8z<({ZW͎!\~ #5+ 6}!\ !\(.!\('~ ~_w#6#: \w#NV3w2\#6#5: \w#~B{' x!~7{:8/ O(O!(!~!)@(Z( 0^ ƥ0  !Th(80 6!09(0(ƀh!0 "( >_>@}==/O! :H\8 ?DOg z( yMM 1'4l8!\~ ^#N#Fx T# Px<%l 0 !n4ʹ38w18͔ 0"4CU45q8͙͙PYzõ  `uA$Sʉ.68I>CjsOT\i$v$:;\+bk !?!(! +>G- %/> 7;oz( n|g>7%lyx0B> <#1>z<;:H\8>8 >!? O0!+| 00>Ƹ0$ 0x0yO& 0uyO~#.>˸|gz |>= >Щ (y/O7:t\2t\͌0%(<:t\(" > 6+! 0:t\ x(  # I:t\ʊͲ(0 !:t\=(Š0%(#~w #~w #q>q(6R~ݾ 0 ! ~< yO#  y > ~( :t\=ʶnf^ V |( R8&(~ | n f:t\7 >V^ V |  nf7R8 DM~(>|(+F+N+"_\*_\*Y\+N F ~U#w#s#r#7>*Y\+"_\N F U*_\#NF "K\f| n "B\6 7>N F 67>[S\~ # +0͸, ~O*K\~(%(͸ # 0><7,  "_\͸*_\͸"_\*S\8+U#U#SS\[_\> 2v^ V >Start tape, then press any key Program: Number array: Character array: Bytes: 8i0e! _^ NW)TSR7PO_^]\[ZTS >" N > ! :\6W> e 2\N!U   y==Z>?l 2\ m  2\*Q\s#r ̀ *\W}" )DJ>8 ON >ڟ ;  $ N F C\"\C\C\"\qE"\N K\*\FK\*\NE*\8=0&G8  \G!\> Ow# ֥0 K{\   K6\!;\ˆ &o))) yTrack-Info  R         =>! ON(yU :\8O>N(078#= %N #> _|Xg[\~Wv(W 8Wf(o w&A 8 > F; ; 0H(z> <~#(= AN xF 18f(^-(Z>{?\5R E>2\*\:\> !;\ˮ (E(A n(;>2\"\ F1!͛|XgZN q#ɀscroll 81DG*\*\M x!k\Fx*Q\ s#r#?8!*!"}\0͔ >M D*Q\ s#r6R!![N xF(1G͛>!_ ͛xx ! =!GOx $ ͈!͛xOx T]6=G $ ͈bk:\F(:H\w !|=Pgah)))))DM>Woz@g!@$| } o?g ![>![uFGw#0! xWT8 > 0 ^#0z *=\!s=\^!͵!8018-8:W8 7~_*[\U#p#q *[\RS[\_!^*[\ fjPp~*I\7n—n͕zʗ#N#F! DM͗*Q\>+5U4*Y\####"[\7n !I\m61~ #"[\1"=\~7͕R#DMbk# # #B 87n*I\n͕!J\͕>7~(Á0f(6^!͵0͐+"[\6^n:\nn 0R0-0 GOx* !j\>w !A\w 6޿GO>X  ^!͵6[\"=\ "\6&*a\+[Y\7n[a\*c\~~# >[\K\[8\*{\G>>?Gbk6+ R#05(5(+C\S8\"{\("\>#"{\+@C8\"\!<"6\*\6>+++"=\V!:\!\"O\+"W\#"S\"K\6#"Y\6 #6#"a\"c\"e\>82\2\2H\!#" \55!\61k 8 61͕Ͱ>,~ 0f(@*Y\ͧ6*Y\"]\x] (0Fį n >O2\66 ͊v0N::\ x 6 KE\>:N ͗::\<( ( 4 p\!D\~( 6 ìONEXT without FOVariable not founSubscript wronOut of memorOut of screeNumber too biRETURN without GOSUEnd of filSTOP statemenInvalid argumenInteger out of rangNonsense in BASIBREAK - CONT repeatOut of DATInvalid file namNo room for linSTOP in INPUFOR without NEXInvalid I/O devicInvalid colouBREAK into prograRAMTOP no gooStatement losInvalid streaFN without DEParameter erroTape loading erro, 1982 Sinclair Research Lt>CI\*]\!U*a\7R`in ͸y=((+[S\U"S\*a\++*I\p+q+s+râ K SR P n (*Q\##0*Q\^#V,ɇo&\^#Vz *O\"Q\0####N!-^KSP0M d*e\!K\>^#VR0 r+s##= RDM~ V#^*c\+U##Ca\#*Y\6 "[\#6#"a\*a\"c\*c\"e\!\"h\[Y\#~ȹ# 78 N#Fq#p*O\ ###N!N KSP͔8!\O N#F+8x(*O\ ###~K(S(P ]s#r+x O!z0N KSP  x Ws?\6ͯ F1D0*I\[l\R8"nRn͸ 8V#^+Sl\"l\*l\n(3>>60%p 8;(, ͙͂x?gi"I\nUf(:k\O !l\KI\̀>(s-~@(###z(0!;\˖7n(*_\R >?~Ͷ# (7######~*\˼"\!\V6 tW"\*[\R:A\(C!;\˞>KV( <0^(>C^#V#n͕7nr+s{ <8B=(-00!8,($: 7n 0V(" :j\2j\*S\T]̀͸~#~+###"]\ #~Ͷ"]\"  :( A( 7~@8o(?0#~0##N#F# ѧRDMx/Gy/Od*Y\+"]\!\"e\;-͢-8! ڊx `iV#^ ***}ɱ˼į.lnpHV?A+7wDY+C-Q:mB I\D]=g#= ,O_k ":'B #   #z"`, 6  ,  2G\=2:\Ϳ4  (z:(!vOyڊO!H N *t\~#"t\RO 0 ! N ߹ŠT8 ~ q*B\|(!"E\*a\+[Y\:D\3n:D\( CG~x(0%*U\>V#^SE\#^#V#"U\"]\W6 r (͋(0% (:(ÊK g {q*t\N#FͲ(6707 ̖)v 0%+!q\wCr\"M\V:;\$V@ $z*Ͳ(y< ͂, $v $v~M :t\!*\"\!\~檮w0%(M !\~wW! (: 0%80%( 84ڳ) ͂88*"h\+~ 8 U#8 *E\s#rV #rF8*E\"B\:G\DW*]\KU\͆CU\8 (>Track-Info  R 2D\~:(#~7F#NCB\#N#F DM͋7N.*M\~(#"h\8*h\^#V#fs678870%()"_\*W\~,( ͆0 wV"W\*_\6&x,(0% $,>GË͙`in+"W\͙x Kx\Cv\*n\V6 ͙`i|0,"B\r ͅyͅ-8(D͙-͢-8 gE͙x K\[K\*Y\+k *e\2R0*\R0"\6>+s=\f $3KE\s=\g*e\ 8 !P8r.UDMz>( ;s=\s͙v x( x< n(>>0%(>9͍,0$ ( <)( ͍,Ҋ$ U##6, ) = :;\$@Š0%>>0%M E ( N (N ()> y#> ͙͂>yx!p $v+-x ) :;(, 0%( >'E #7͔͂0%(>n 6 K\:k\8!GC\>2\ n N (( )Šò! 7vŠ ͍,ү!70%ʲ!Ϳ!q\˶~ :;\@ w6 y0>"+w"[\7~ ,*]\*=\!:!0f(s=\*a\ͧ6,͹!,6"! K\ !q\ˮ~˾ "=\"_\͹!*_\6&"]\*c\[a\7RDMͲ**N *a\"]\( :q\Y 0%*Q\####~K!,(;(Ê?͔͂Wz((Vz Oz0y!\8z88Oz 8!\8 ~(/$(xOyl">l"PG>w#xɟz @Oz(0y!\l"y͔0o 2H\>$G7gyǨoy#ͪ"G~(-#"M C}\ͪ"G>G~NWA Q /w #G#YQO-$,Š͂*=8~08868}$18~08"1184b͔o͔g"}\ $,(w$͂Ţ1008w$1***=8~08w$}$111 **8w$8:}\(-8:~\(-8(<1818:}\(-8:~\(-8ͷ$8:}\(-8:~\(-8ͷ$M 1(42*8-80>(-11118#y0iկ_hA`x88OO*}\xGy<8 ( =O"y( O!%y҄&N t ʊ" t"( y)Š~#*6\y_y@W`(< =O# > Hò*#yOoyXg~(-"(O.+VW檿ǩ$#% %(0%(~#" ~#"( !;\˶~IJ*'$)Š'ý'0%((Kv\+-474A218͢-Cv\~(w 0%(84&Z# '!;\˶~(͎ 0_3Ͳ*'"%5%%"%Ā%H"%"?͈,0VA0<0% #͛,U#6#*e\B"e\+w#~ #ʹ3"]\Ͳ(.̖):;\8#ʹ33 -('( ֯ڊ(ҊO0˱8˹$( v R*O!'0N!& Fz8:!;\{ v 0%( {?G;8 {@Š!;\{ ˶yv ?O 8($+-*/^=>< 0% 5͍,Ҋ$ ( )($, )Š!;\˶('G$O *S\+͆0ͫ(߸ ͫ($( +͋ק̫(S]\ͫ()(B#~@(+ͫ(##$@ +*e\B"e\+ͫ()( , ͫ()("]\* \" \$"]\" \'#~!8͍,ҊO((($(͈,0͈,0˱: \(0%Q)A0% yO7*K\~(- "?)80# ( ( ͈,0͸((  ͈,0p* \~)(~`G#~(+ͫ(#˨x(#####ͫ()(ͫ(i #[e\3"e\ѯ<ɯGy K~ <#N#F#Ͳ*I*###Fq( (( a$,( y(Rq ) <)(l 2+"]\^!y )(Q(**8 * y fq BK)(* ** #BKͱ*)(, R*((0%+)(Pկ(*PY( )Šbk)( *`i) +R8# *DM0%ȯͩ3*e\w#s#r#q#p#"e\ɯ͂0%(͙x7(Bz#^#V0%ͩ0*M\7N(^#~ (0 80 #͈,8$+y*Y\+U##*M\G(#~!8 >*M\ +8B@v(*M\Kr\7F 0xT]#6 +B 0DMx(x+++~+>*M\+ +"M\*Y\+U*M\#p+q+w*Y\+*e\+F+N+V+^+~"e\Ͳ(Š0% ˱͖)8͸!q .&* *$`i*,() yh&##)DM*Y\+U#w #q#px#wbk6q(6 p+q+= -?A?[a?{ 1 ?jڭ1BK+-.(;-. (-8" -ڊ88"-8 8E(e+(- -8;--ڭ11(DO-0:?-0O!:\_QHGͶ*88"-8t0/0*8>-81'8~ G-z ( SW8~~-W:\2\zO-1'8-2\=oA8ͺ/>./~q8 {͋/_z͋/W!\yNq w4q!\Nq A+~w( ?064rpq8K\!\x 88&R/G y(~# y>.>0APJ/>EJy/DO>Track-Info  R ->+o&]T)))YL}~6#~+ AO7+~/wyN#Fw#yN#N#FW^#V#^#V#^ɧ!0G-0ٯ.W] n4 &##^#V###~#N#F  w#s#r++++͓2͛/G͛/O0xAͺ//whaJ|o0>/4(#}#w+({D?_z/W{/_z/04ʭ1WٯU1|M!)8 084#+ "-A-xOͩ08 z O͎-͓2008Zͺ/xbb!0Zx =??F10h< 8z \wx0~>(٢/w8.#w+) z 5(0 0 4(#xw#q#r#s͓2080ͺ/`iah)j8RR0Z٧RR71(_QYPx=1~06> Q ###>++ >+ 6w#6+>30,/Ƒ#V#^++z( 8Z(G:͎-~֠D+G888(6+( G>'w͖2~-#w+wz B(SX)0 +s+r+p@0Iڢ@ 6<43001Q85$5;5;5;5;5;5;50-5;5;5;5;5;5;5554E6n4i65t677738C87766J84j44446553663z6546723O-2I44-44Ϳ5x2g\Se\~#3W`|oz0T] o2&^#V!e3Kf\:g\[e\3Se\ͩ3bkͩ3~O ~? #~P>#G3=OO *h\43bk!233*h\43Nq#G^31183b3584~( #x怶?w+-x/O͎-4#+O͎-͙x͙ (-͙!+-+ x #͍,8 ֐80<=0 K{\O0+- G~###x74>4#+>w#w#w#w#w474Ч4xW =0<4W 03++|x (?( 8 #+8545++ DMͲ*x(x(*e\-8 Ͳ* *]\x+S]\+6 $ @Š"]\$"]\"[\*Q\>-*[\RDMͲ*͔ҟ*Q\0 Ͳ*ÿ5+x((-++-!g\5 #^{W #1'816:81:08=48;)1'16Xefxe@`2!$/~X:~8- 80 80Dw8=178 8~6(-4814L78441r142  VڥY0\poaږ1\C6~^n#8=4"n1'111*178ɡ689*39111\ 8c# #]81 8͗2~8163111UX9[6ucB 66s]ca 811($18"810810%8610 78$$$~$$~$>(> >bd&F(*D:  >>> < >>>BB<DHpHDB@@@@@~BfZBBBBbRJFB